/********************************************************************************
do-file to replicate tables in:
	Chacon, Mario and Jeff Jensen. 2019. "Democratization, De Facto Power, and Taxation: 
	Evidence from Military Occupation during Reconstruction" World Politics 

data file needed: Dataset_1 (Main Panel) 
*/

clear all 
set more off

**Set Working Directory 
*cd "C:\****\ Replication Files (Chacon & Jensen, WP 2019)\Datasets\"

*** Online Appendix Table 4. Additional Controls ***
use Dataset_1, clear 

global ldc lnTotPop1860 i_lnTotPop1860_DORecon ///
lnFarValRPc1860 i_lnFarValRPc1860_DORecon ///
lnAgriGdpRPc1870 i_lnAgriGdpRPc1870_DORecon ///
lnManGdpRPc1870 i_lnManGdpRPc1870_DORecon 

*Share-cropping controls & interactions 
global ldc1 ShCrSh1880 i_ShCrSh1880_DORecon 
global ldc2 ShCrSh21880 i_ShCrSh21880_DORecon
global ldc3 dShCrSh9080 

** State Rev. 1870-1890 
*
reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon ShCrSh1880) dec(3) noast 

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon dShCrSh9080 ) dec(3) noast 

**County 
reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon ShCrSh1880) dec(3) noast 

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon dShCrSh9080 ) dec(3) noast 

*Total 
reg del2_ln_total_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon ShCrSh1880) dec(3) noast 

reg del2_ln_total_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA4.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon dShCrSh9080 ) dec(3) noast 
